home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / ASRegistry.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  10.8 KB  |  286 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        ASRegistry.a
  3. ;
  4. ;    Contains:    AppleScript Registry constants.
  5. ;
  6. ;    Version:    Technology:    AppleScript 1.1
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__ASREGISTRY__') = 'UNDEFINED' THEN
  21. __ASREGISTRY__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__APPLEEVENTS__') = 'UNDEFINED' THEN
  25.     include 'AppleEvents.a'
  26.     ENDIF
  27. ;        include 'Errors.a'                                            ;
  28. ;            include 'ConditionalMacros.a'                            ;
  29. ;        include 'Types.a'                                            ;
  30. ;        include 'Memory.a'                                            ;
  31. ;            include 'MixedMode.a'                                    ;
  32. ;        include 'OSUtils.a'                                        ;
  33. ;        include 'Events.a'                                            ;
  34. ;            include 'Quickdraw.a'                                    ;
  35. ;                include 'QuickdrawText.a'                            ;
  36. ;        include 'EPPC.a'                                            ;
  37. ;            include 'AppleTalk.a'                                    ;
  38. ;            include 'Files.a'                                        ;
  39. ;                include 'Finder.a'                                    ;
  40. ;            include 'PPCToolbox.a'                                    ;
  41. ;            include 'Processes.a'                                    ;
  42. ;        include 'Notification.a'                                    ;
  43.  
  44.     IF &TYPE('__AEREGISTRY__') = 'UNDEFINED' THEN
  45.     include 'AERegistry.a'
  46.     ENDIF
  47.  
  48.     IF &TYPE('__AEOBJECTS__') = 'UNDEFINED' THEN
  49.     include 'AEObjects.a'
  50.     ENDIF
  51.  
  52. keyAETarget                        EQU        'targ'                ;  0x74617267  
  53. keySubjectAttr                    EQU        'subj'                ;  0x7375626a  
  54. ; Magic 'returning' parameter: 
  55. keyASReturning                    EQU        'Krtn'                ;  0x4b72746e  
  56. ; AppleScript Specific Codes: 
  57. kASAppleScriptSuite                EQU        'ascr'                ;  0x61736372  
  58. kASTypeNamesSuite                EQU        'tpnm'                ;  0x74706e6d  
  59. ; dynamic terminologies 
  60. typeAETE                        EQU        'aete'                ;  0x61657465  
  61. typeAEUT                        EQU        'aeut'                ;  0x61657574  
  62. kGetAETE                        EQU        'gdte'                ;  0x67647465  
  63. kGetAEUT                        EQU        'gdut'                ;  0x67647574  
  64. kUpdateAEUT                        EQU        'udut'                ;  0x75647574  
  65. kUpdateAETE                        EQU        'udte'                ;  0x75647465  
  66. kCleanUpAEUT                    EQU        'cdut'                ;  0x63647574  
  67. kASComment                        EQU        'cmnt'                ;  0x636d6e74  
  68. kASLaunchEvent                    EQU        'noop'                ;  0x6e6f6f70  
  69. keyScszResource                    EQU        'scsz'                ;  0x7363737A  
  70. typeScszResource                EQU        'scsz'                ;  0x7363737A  
  71. ; subroutine calls 
  72. kASSubroutineEvent                EQU        'psbr'                ;  0x70736272  
  73. keyASSubroutineName                EQU        'snam'
  74.  
  75. ; Operator Events: 
  76. ; Binary: 
  77. kASAdd                            EQU        '+   '                ;  0x2b202020  
  78. kASSubtract                        EQU        '-   '                ;  0x2d202020  
  79. kASMultiply                        EQU        '*   '                ;  0x2a202020  
  80. kASDivide                        EQU        '/   '                ;  0x2f202020  
  81. kASQuotient                        EQU        'div '                ;  0x64697620  
  82. kASRemainder                    EQU        'mod '                ;  0x6d6f6420  
  83. kASPower                        EQU        '^   '                ;  0x5e202020  
  84. kASEqual                        EQU        kAEEquals
  85. kASNotEqual                        EQU        '≠   '                ;  0xad202020  
  86. kASGreaterThan                    EQU        kAEGreaterThan
  87. kASGreaterThanOrEqual            EQU        kAEGreaterThanEquals
  88. kASLessThan                        EQU        kAELessThan
  89. kASLessThanOrEqual                EQU        kAELessThanEquals
  90. kASComesBefore                    EQU        'cbfr'                ;  0x63626672  
  91. kASComesAfter                    EQU        'cafr'                ;  0x63616672  
  92. kASConcatenate                    EQU        'ccat'                ;  0x63636174  
  93. kASStartsWith                    EQU        kAEBeginsWith
  94. kASEndsWith                        EQU        kAEEndsWith
  95. kASContains                        EQU        kAEContains
  96.  
  97. kASAnd                            EQU        kAEAND
  98. kASOr                            EQU        kAEOR
  99. ; Unary: 
  100. kASNot                            EQU        kAENOT
  101. kASNegate                        EQU        'neg '                ;  0x6e656720  
  102. keyASArg                        EQU        'arg '
  103.  
  104. ; event code for the 'error' statement 
  105. kASErrorEventCode                EQU        'err '                ;  0x65727220  
  106. kOSAErrorArgs                    EQU        'erra'                ;  0x65727261  
  107. ; Properties: 
  108. pLength                            EQU        'leng'                ;  0x6c656e67  
  109. pReverse                        EQU        'rvse'                ;  0x72767365  
  110. pRest                            EQU        'rest'                ;  0x72657374  
  111. pInherits                        EQU        'c@#^'                ;  0x6340235e  
  112. ; User-Defined Record Fields: 
  113. keyASUserRecordFields            EQU        'usrf'                ;  0x75737266  
  114. typeUserRecordFields            EQU        typeAEList
  115.  
  116. ; Prepositions: 
  117. keyASPrepositionAt                EQU        'at  '                ;  0x61742020  
  118. keyASPrepositionIn                EQU        'in  '                ;  0x696e2020  
  119. keyASPrepositionFrom            EQU        'from'                ;  0x66726f6d  
  120. keyASPrepositionFor                EQU        'for '                ;  0x666f7220  
  121. keyASPrepositionTo                EQU        'to  '                ;  0x746f2020  
  122. keyASPrepositionThru            EQU        'thru'                ;  0x74687275  
  123. keyASPrepositionThrough            EQU        'thgh'                ;  0x74686768  
  124. keyASPrepositionBy                EQU        'by  '                ;  0x62792020  
  125. keyASPrepositionOn                EQU        'on  '                ;  0x6f6e2020  
  126. keyASPrepositionInto            EQU        'into'                ;  0x696e746f  
  127. keyASPrepositionOnto            EQU        'onto'                ;  0x6f6e746f  
  128. keyASPrepositionBetween            EQU        'btwn'                ;  0x6274776e  
  129. keyASPrepositionAgainst            EQU        'agst'                ;  0x61677374  
  130. keyASPrepositionOutOf            EQU        'outo'                ;  0x6f75746f  
  131. keyASPrepositionInsteadOf        EQU        'isto'                ;  0x6973746f  
  132. keyASPrepositionAsideFrom        EQU        'asdf'                ;  0x61736466  
  133. keyASPrepositionAround            EQU        'arnd'                ;  0x61726e64  
  134. keyASPrepositionBeside            EQU        'bsid'                ;  0x62736964  
  135. keyASPrepositionBeneath            EQU        'bnth'                ;  0x626e7468  
  136. keyASPrepositionUnder            EQU        'undr'
  137.  
  138. keyASPrepositionOver            EQU        'over'                ;  0x6f766572  
  139. keyASPrepositionAbove            EQU        'abve'                ;  0x61627665  
  140. keyASPrepositionBelow            EQU        'belw'                ;  0x62656c77  
  141. keyASPrepositionApartFrom        EQU        'aprt'                ;  0x61707274  
  142. keyASPrepositionGiven            EQU        'givn'                ;  0x6769766e  
  143. keyASPrepositionWith            EQU        'with'                ;  0x77697468  
  144. keyASPrepositionWithout            EQU        'wout'                ;  0x776f7574  
  145. keyASPrepositionAbout            EQU        'abou'                ;  0x61626f75  
  146. keyASPrepositionSince            EQU        'snce'                ;  0x736e6365  
  147. keyASPrepositionUntil            EQU        'till'
  148.  
  149. ; Terminology & Dialect things: 
  150. kDialectBundleResType            EQU        'Dbdl'                ;  0x4462646c  
  151. ; AppleScript Classes and Enums: 
  152. cConstant                        EQU        typeEnumerated
  153. cClassIdentifier                EQU        pClass
  154. cObjectBeingExamined            EQU        typeObjectBeingExamined
  155. cList                            EQU        typeAEList
  156. cSmallReal                        EQU        typeSMFloat
  157. cReal                            EQU        typeFloat
  158. cRecord                            EQU        typeAERecord
  159. cReference                        EQU        cObjectSpecifier
  160. cUndefined                        EQU        'undf'                ;  0x756e6466  
  161. cSymbol                            EQU        'symb'                ;  0x73796d62  
  162. cLinkedList                        EQU        'llst'                ;  0x6c6c7374  
  163. cVector                            EQU        'vect'                ;  0x76656374  
  164. cEventIdentifier                EQU        'evnt'                ;  0x65766e74  
  165. cKeyIdentifier                    EQU        'kyid'                ;  0x6b796964  
  166. cUserIdentifier                    EQU        'uid '                ;  0x75696420  
  167. cPreposition                    EQU        'prep'                ;  0x70726570  
  168. cKeyForm                        EQU        enumKeyForm
  169. cScript                            EQU        'scpt'                ;  0x73637074  
  170. cHandler                        EQU        'hand'                ;  0x68616e64  
  171. cProcedure                        EQU        'proc'
  172.  
  173. cClosure                        EQU        'clsr'                ;  0x636c7372  
  174. cRawData                        EQU        'rdat'                ;  0x72646174  
  175. cString                            EQU        typeChar
  176. cStringClass                    EQU        typeChar
  177. cNumber                            EQU        'nmbr'                ;  0x6e6d6272  
  178. cListOrRecord                    EQU        'lr  '                ;  0x6c722020  
  179. cListOrString                    EQU        'ls  '                ;  0x6c732020  
  180. cListRecordOrString                EQU        'lrs '                ;  0x6c727320  
  181. cNumberOrDateTime                EQU        'nd  '                ;  0x6e642020  
  182. cNumberDateTimeOrString            EQU        'nds '                ;  0x6e647320  
  183. cSeconds                        EQU        'scnd'                ;  0x73636e64  
  184. enumBooleanValues                EQU        'boov'                ;  0x626f6f76  
  185. kAETrue                            EQU        typeTrue
  186. kAEFalse                        EQU        typeFalse
  187. enumMiscValues                    EQU        'misc'                ;  0x6d697363  
  188. kASCurrentApplication            EQU        'cura'                ;  0x63757261  
  189. ; User-defined property ospecs: 
  190. formUserPropertyID                EQU        'usrp'
  191.  
  192. ; Global properties: 
  193. pASIt                            EQU        'it  '                ;  0x69742020  
  194. pASMe                            EQU        'me  '                ;  0x6d652020  
  195. pASResult                        EQU        'rslt'                ;  0x72736c74  
  196. pASSpace                        EQU        'spac'                ;  0x73706163  
  197. pASReturn                        EQU        'ret '                ;  0x72657420  
  198. pASTab                            EQU        'tab '                ;  0x74616220  
  199. pASPi                            EQU        'pi  '                ;  0x70692020  
  200. pASParent                        EQU        'pare'                ;  0x70617265  
  201. kASInitializeEventCode            EQU        'init'                ;  0x696e6974  
  202. pASPrintLength                    EQU        'prln'                ;  0x70726c6e  
  203. pASPrintDepth                    EQU        'prdp'                ;  0x70726470  
  204. pASTopLevelScript                EQU        'ascr'
  205.  
  206. ; Considerations 
  207. kAECase                            EQU        'case'                ;  0x63617365  
  208. kAEDiacritic                    EQU        'diac'                ;  0x64696163  
  209. kAEWhiteSpace                    EQU        'whit'                ;  0x77686974  
  210. kAEHyphens                        EQU        'hyph'                ;  0x68797068  
  211. kAEExpansion                    EQU        'expa'                ;  0x65787061  
  212. kAEPunctuation                    EQU        'punc'                ;  0x70756e63  
  213. kAEZenkakuHankaku                EQU        'zkhk'                ;  0x7a6b686b  
  214. kAESmallKana                    EQU        'skna'                ;  0x736b6e61  
  215. kAEKataHiragana                    EQU        'hika'                ;  0x68696b61  
  216. ; AppleScript considerations: 
  217. kASConsiderReplies                EQU        'rmte'                ;  0x726d7465  
  218. enumConsiderations                EQU        'cons'
  219.  
  220. cCoercion                        EQU        'coec'                ;  0x636f6563  
  221. cCoerceUpperCase                EQU        'txup'                ;  0x74787570  
  222. cCoerceLowerCase                EQU        'txlo'                ;  0x74786c6f  
  223. cCoerceRemoveDiacriticals        EQU        'txdc'                ;  0x74786463  
  224. cCoerceRemovePunctuation        EQU        'txpc'                ;  0x74787063  
  225. cCoerceRemoveHyphens            EQU        'txhy'                ;  0x74786879  
  226. cCoerceOneByteToTwoByte            EQU        'txex'                ;  0x74786578  
  227. cCoerceRemoveWhiteSpace            EQU        'txws'                ;  0x74787773  
  228. cCoerceSmallKana                EQU        'txsk'                ;  0x7478736b  
  229. cCoerceZenkakuhankaku            EQU        'txze'                ;  0x74787a65  
  230. cCoerceKataHiragana                EQU        'txkh'                ;  0x74786b68  
  231. ; Lorax things: 
  232. cZone                            EQU        'zone'                ;  0x7a6f6e65  
  233. cMachine                        EQU        'mach'                ;  0x6d616368  
  234. cAddress                        EQU        'addr'                ;  0x61646472  
  235. cRunningAddress                    EQU        'radd'                ;  0x72616464  
  236. cStorage                        EQU        'stor'
  237.  
  238. ; DateTime things: 
  239. pASWeekday                        EQU        'wkdy'                ;  0x776b6479  
  240. pASMonth                        EQU        'mnth'                ;  0x6d6e7468  
  241. pASDay                            EQU        'day '                ;  0x64617920  
  242. pASYear                            EQU        'year'                ;  0x79656172  
  243. pASTime                            EQU        'time'                ;  0x74696d65  
  244. pASDateString                    EQU        'dstr'                ;  0x64737472  
  245. pASTimeString                    EQU        'tstr'                ;  0x74737472  
  246. ; Months 
  247. cMonth                            EQU        pASMonth
  248. cJanuary                        EQU        'jan '                ;  0x6a616e20  
  249. cFebruary                        EQU        'feb '                ;  0x66656220  
  250. cMarch                            EQU        'mar '                ;  0x6d617220  
  251. cApril                            EQU        'apr '                ;  0x61707220  
  252. cMay                            EQU        'may '                ;  0x6d617920  
  253. cJune                            EQU        'jun '                ;  0x6a756e20  
  254. cJuly                            EQU        'jul '                ;  0x6a756c20  
  255. cAugust                            EQU        'aug '                ;  0x61756720  
  256. cSeptember                        EQU        'sep '                ;  0x73657020  
  257. cOctober                        EQU        'oct '                ;  0x6f637420  
  258. cNovember                        EQU        'nov '                ;  0x6e6f7620  
  259. cDecember                        EQU        'dec '
  260.  
  261. ; Weekdays 
  262. cWeekday                        EQU        pASWeekday
  263. cSunday                            EQU        'sun '                ;  0x73756e20  
  264. cMonday                            EQU        'mon '                ;  0x6d6f6e20  
  265. cTuesday                        EQU        'tue '                ;  0x74756520  
  266. cWednesday                        EQU        'wed '                ;  0x77656420  
  267. cThursday                        EQU        'thu '                ;  0x74687520  
  268. cFriday                            EQU        'fri '                ;  0x66726920  
  269. cSaturday                        EQU        'sat '                ;  0x73617420  
  270. ; AS 1.1 Globals: 
  271. pASQuote                        EQU        'quot'                ;  0x71756f74  
  272. pASSeconds                        EQU        'secs'                ;  0x73656373  
  273. pASMinutes                        EQU        'min '                ;  0x6d696e20  
  274. pASHours                        EQU        'hour'                ;  0x686f7572  
  275. pASDays                            EQU        'days'                ;  0x64617973  
  276. pASWeeks                        EQU        'week'                ;  0x7765656b  
  277. ; Writing Code things: 
  278. cWritingCodeInfo                EQU        'citl'                ;  0x6369746c  
  279. pScriptCode                        EQU        'pscd'                ;  0x70736364  
  280. pLangCode                        EQU        'plcd'                ;  0x706c6364  
  281. ; Magic Tell and End Tell events for logging: 
  282. kASMagicTellEvent                EQU        'tell'                ;  0x74656c6c  
  283. kASMagicEndTellEvent            EQU        'tend'
  284.  
  285.     ENDIF ; __ASREGISTRY__
  286.